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a counter as only one component 


ounters are the perfect data type for 
key fields. Because Access generates 
sequential numbers, counters are 
guaranteed to be unique. Furthermore, if 
you work on a network and you share the 
database with other users, counters ensure 


abl Members 


You want your data-entry form to generate Member ID values from the member’s 


name and a counter value. 


æ + Removing the 
M mo Ne. 


that two users don’t ever accidentally use 
the same key value. 

However, counters have their drawbacks, 
too. You often want a key field to store 
data that’s more meaningful than ordinary 
sequential numbers. Also, you may have to 
change key values. As you know, Access 
doesn’t let you edit counter fields. 

In this article, we’ll show you a com- 
promise. We’ll present a technique for 
creating a macro that builds key fields 
from the other field entries in the record. 
You can ensure the key will always be uni- 
que by including a counter field as one of 
the key’s components. Because the key 
field isn’t actually a counter, you can update 
the values. Furthermore, because you in- 
corporate other field entries, the value is 
descriptive. 


An example 


Before we describe the technique, let’s clar- 
ify these ideas with an example. Suppose 
you want the Members table key value to 
consist of the first two letters of the member’s 
name and a four-digit counter value. Figure 
A shows some sample data from such a 
Members table. You want to be able to edit 
the Member ID key values, and you also 
want Access to generate the key values for 
you. 


The technique 


Generally speaking, you'll create a macro 
that generates a key value from the record’s 
other field entries. You'll then assign the 
macro to the After Update event property 
of your data-entry form. When you leave 
the new record or issue the Save Record 
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Table A 


Field Name 


Member ID 


Data Type Properties 


Field Size = 8 


_ Member Name Text 


Field Size = 50 


Address 


Text Field Size = 30 


Text Field Size = = = 30 


Text Field Size = = 


Text Field Size = = -10 


Counter Field 


Counter 


command from the File menu, Access will 
generate the record’s counter value and 
then run your macro. The macro will con- 
struct the key value and assign the result to 
the new record’s key field. 

Unfortunately, After Update is not the 
perfect event for this technique. After Up- 
date will occur when you update an exist- 
ing record as well as when you post a new 
record. Therefore, your macro will run every 
time you save a modified record. Since you 
want the macro to generate a key value only 
for new records, the macro must be able to 
distinguish new records from existing ones. 
Otherwise, you won't be able to update the 
key field. If you modify the key field’s con- 
trol on the form and then post your changes, 
your macro will reset the key field. 


To prevent this from happening, you 
define a default value for the field and 
design the macro to generate a key value 
only when the field contains the default 
value. If the field doesn’t contain the de- 
fault value, the macro can assume the 
record already has a valid key field. 

For example, you can assign the string 
New to the field’s Default Value property. 
Then, use the Condition column in your 
macro to check whether the key field con- 
tains New before generating a value. 

At first, you might think you could 
avoid all this hassle by assigning the 
macro to the form’s On Insert property. 
After all, you trigger this event only when 
you add a new record. However, On 
Insert occurs when you type the first 
character of a new record. Remember, you 
want to build the key value from entries in 
the record’s other fields. When On Insert 
occurs, you haven’t yet entered any 
information. 


Building a data-entry system 
for the Members table 


Let’s work through the example we intro- 
duced earlier. Table A shows the structure 
of the Members table. Figure A on page 

1 contains some sample data. We’ll first 
create a form for this table. We’ll then 
develop a macro that generates new 
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Member ID values and assign the macro to In the Save As dialog box, Figure B 


the form’s After update property. enter Generate ID and click poenae 
OK. Then, close the window. | 
Creating the form Now return to Members 


To create the form, highlight the Members Form and assign the Generate 
table in the Database window and click the ID macro to the After Update 
New Form button ((&J) on the tool bar. In property by either typing Gen- 
the New Form dialog box, click the Form- erate ID in the After Update 

Wizards button. Then, in the following dia- | combo box or choosing it from 


log box, select the Single-Column option the dropdown list. Make sure 
and click OK. When the Single-Column you assign the macro to the 
wizard’s first dialog box appears, click the form's After Update property. 
Fast Forward button ((/) to generate the If, when you return to the 


default form. In the final dialog box, click form, the property sheet dis- - P aN 
, i | Fols omperiies ou create this form for the Members 
the Design button. Figure B shows the form plays a con prop j table to implement our example. 
that the wizard creates. click the white rectangle at 
Next, set the Default Value property for the intersection of the rulers. The property 
the key field’s text box control. Start by sheet will then list the form’s properties. 


selecting the Member ID text box and then Once you locate the After Update property, 
clicking the Properties button (62 you can click its dropdown arrow and 


tool bar. Default Value is the thirteenth choose Generate ID from the selection list. 
property in the property sheet. Move to 
Default Value and enter the word New. A few enhancements 

We'll next create the macro that generates Generate ID is the macro that’s most im- 
the Member ID values. But first, save the portant to our technique. However, you'll 
form by pulling down the File menu and probably want to create the two other 
clicking the Save As... selection. Enter macros we’re about to show you in order 
Members Form in the Save As dialog box to make this technique more reliable. 
and click OK. First, you may want a macro that vali- 


dates the Member Name field before let- 
Creating the Generate ID macro ting you leave the record. Remember, the 
Return to the Database window by press- Generate ID macro draws the ID value’s 
ing [F11], click the Macro button to list the first two characters from Member Name. 
database’s macros, and then click the New _ If you don’t enter a member name, the key 
button. When the Macro window appears, field will consist of only the four-digit num- 


click the Condition button ((&) on the tool ber. After opening a new Macro window 


bar to open the Condition column. by using the same steps we described pre- 
In the Condition cell, enter viously, enter the conditions and actions 
listed in Table B. Then, save the macro 
[Member ID] = “New” under the name Validate Member Name and 


close the window. 

The Validate Member Name macro 
checks whether the current record’s Mem- 
ber Name text box contains a Null value. If 


In the Action cell, type SetValue or select 
SetValue from the selection list. The SetValue 
action has two arguments—Item and Ex- 
pression. Item is the quantity that receives 
a new value; Expression is the value that Table B 


the action assigns to Item. Assign [Member The Validate Member Name macro 
ID] to the Item argument and enter the 


expression Condition Action Action Argument 

UCase$(Left$([Member Name],2)) & [Member Name] Is Null MsgBox Message = You must 

= Format([Counter Field], "0000" ) enter a member name 
Beep = Yes 

for Expression. BC es 


When you've finished, pull down the 
File menu and click the Save As... option. 


CancelEvent 
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Figure C 


The value New appears in the 
new record’s Member ID field. 


Figure D 


When you save the new record, 
the macro will generate a 
key value. 


Subscribe. to Inside Microsoft Access Resource Disk! 


D: you wish that you could experiment with 
the forms, reports, tables, macros, modules, 
~ and queries we regularly feature in Inside Microsoft 


_ Access but don’t have the time or patience to create 

_ them? If so, you may want to subscribe to Inside 
Microsoft Access Resource Disk. Once you subscribe, 
__ we'll send you a disk loaded with all the useful tips 
_ featured in that month's Inside Microsoft Access. (See 
_ the articles marked with the disk icon.) 


so, the macro first displays the 
Warning! message box and then 
issues the CancelEvent action to 
cancel the record update. 

You should assign the Validate 
Member Name macro to the form’s 
Before Update property. Return to the 
form and click the white rectangle to 
display the form’s properties in the 
property sheet. Next, move to the 
property sheet and find the Before 
Update property. Then, click the drop- 
down arrow and select Validate 
Member Name from the list of macros. 

You may also want to create a 
macro that prevents you from mov- 
ing to the Member ID text box until 
the Generate ID macro assigns a key 
value. If you don’t develop such a 
macro, you may accidentally delete 
the New entry, which tells Generate ID 
that the record still needs a key value. 

Create a new Macro window and 
open the Condition column. In the 
Condition cell, enter 


[Member ID] = "New" 


Because New is the Member ID text box’s 
default value, this condition will evaluate 
to True only for new records that don’t yet 
have a key value. In the Action cell, enter 
SendKeys. The SendKeys action has two 
arguments—Keystrokes and Wait. Assign 
the string {TAB} to the Keystroke argument 
and leave the default value No in the Wait 
argument. Save the macro with the name 
Next Control On New and close the window. 
Now return to the form again, click on 
the Member ID text box, and move to the 
property sheet. Click the On Enter prop- 
erty’s dropdown arrow and select Next 
Control On New from the list of macros. 
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That’s the last change you need to make 
to the form. Pull down the File menu and 
select Save. Then, click the Form View but- 
ton (Œ) on the tool bar to test the macros 
you ve put in place. 


Using Members Form 


As you scroll through existing records, the 
form lets you move to the Member ID text 
box and even change the value. However, 
when you move to the blank record at the 
end of the table, the Member ID text box 
shows the value New, as shown in Figure 
C. If you try to enter Member ID, the Next 
Control On New macro moves you to the 
Member Name field. 

After you enter the member name and 
address information and then leave the 
record, Access runs the Before Update macro 
Validate Member Name. As long as you’ve 
entered a name, Access generates a value 
for the counter field and posts the record 
to the table. Next, Access runs the After 
Update macro Generate ID, which builds 
the key value from the Member Name entry 
and the counter and assigns the result to 
Member ID. In our example, if you enter 
Snider, Frank into the Member Name field 
and save the record, the Generate ID macro 
will generate the key value SN0008, as 
shown in Figure D. The SN component 
comes from the first two letter of Snider; the 
0008 piece comes from the counter field. 


Conclusion 

In this article, we showed you a technique 
for generating a table’s key value. The tech- 
nique offers the advantage of using a counter 
as the key field—but without the restric- 
tions of counters. Although we presented 
the technique for a specific example, you 
should be able to apply it to your tables. «+ 
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Displaying combo box data in 


separate text box controls 


hen you create a combo box to 
look up values from another 
table or query, you can display 

as many of the table’s or query’s fields in 
the selection list as you want. However, 
the combo box control will display only 
one of those fields after you choose a value 
from the selection list. 

As useful as combo boxes are, you may 
sometimes wish you could do more with 
them. Often, you might want to display on 
the form the other fields the combo box dis- 
plays in the selection list. 

Well, although combo boxes can display 
only one field, they retain their connections 
to the other fields. In this article, we’ll show 
you how to create additional text box con- 
trols that display the hidden values in the 
selection list columns. The order form 
shown in Figure A demonstrates how us- 
ing our technique can enhance your forms. 
When you select a customer in the Customer 
ID field’s combo box, the text boxes in the 
panel on the right display additional cus- 
tomer information. 


Comments on creating 
the combo box 


Before we show you how to create the 
figure’s order form, we must review a 
couple of important combo box properties. 
You use the Row Source property to define 
the particular table or query the combo box 
will display in its selection list. Also, you 
use the Column Count property to set the 
number of fields from the table or query 
you want to include in the combo box’s 
selection list. 

For example, suppose you create a combo 
box named CustomerLookUp that lets you 
select a customer ID while viewing the first 
ten fields in the Customer table. To create 
this control, you’d set Row Source to Customer 
and Column Count to 10. 


Displaying additional 
combo box fields 


Now we'll describe how to use the combo 
box’s Column property to display the other 
values in the selection list. You may not 


know about this property, because it 
doesn’t show up in the property sheet. 
You can access it only in expressions. 

To access a particular column, you build 
an expression that begins with the combo 
box’s control name, followed by a period 
and the Column keyword, and finally the 
column number enclosed in parentheses. 
Because the column numbers begin with 0, 
you use 0 to reference the first column, 1 to 
reference the second column, and so on. 

To display the value in a text box, you 
assign your expression to the text box’s 
Control Source property. Suppose you want 
to display the third column of the Customer- 
LookUp combo box in a text box control. 
You'd first make sure the combo box’s 
Column Count property is set to at least 3. 
Then, you’d create the text box on the form 
and type 


=Cus tomerLookUp .Column(2) 


into the text box’s Control Source property. 
When you select a customer from the Cus- 
tomerLookUp combo box while viewing 
the form, the value in that row’s third col- 
umn will appear in your new text box. 

Keep in mind that you're assigning a 
property value in this case—not a field 
entry. Therefore, you must place an equal 
sign in front of the expression. 


An example 

To illustrate how to implement this tech- 
nique, let’s build the order form shown in 
Figure A. The form displays basic order 
data from the Orders table and uses the 


Figure A ——————— 


Form Tip 


Customer Name: |Bergstad's Scandin. 
Contact Name: [Tammy Wong 


Contact Tithe: {Order Administrator 


The panel on the right of this form displays information for the customer whose 


name you select in the combo box. 
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combo box to look up data from the 
Customer table. 

To make life easy, we’ll use the Orders 
and Customers tables from the NWIND.MDB 
database that Microsoft ships with Access. 
Import the tables into your test database by 
using the File menu’s Import... command. 


Table A] Rao 


Question Response 


Which field(s) do you want to Order ID 

include on your form? Customer ID 
Order Date 
Required Date 
Shipped Date 
Order Amount 


What kind of look do you want Standard 
for your form? 


What title do you want for your form? Basic Order Info 


Figure Be? 


Form: Formi 


The Single-Column form wizard will generate this default form. 


Figure C AAA 


T ‘Fann: Fort 


Replace the Customer ID text box with a combo box. 
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In the menu command’s first dialog box, 
select Microsoft Access as the file format 
from which you'll import objects. Then, 
select the NWIND.MDB database from the 
next dialog box. Finally, in the following 
dialog box’s list of tables, select Orders and 
Customers. 

Now that the tables reside in your test 
database, let’s create the order form. Start 
by highlighting the Orders table in the 
Database window and clicking the New 
Form button (Œ) in the tool bar. In the New 
Form dialog box, click the FormWizards 
button and then select the Single-Column 
option in the following dialog box. In the 
series of dialog boxes the wizards present, 
make the selections and choices shown 
in Table A. In the last dialog box, click 
the Design button. The form wizard will 
generate our sample form shown in 
Figure B. 

The form wizard will create default text 
boxes for all the fields you include. Before 
continuing, you'll need to replace the Cus- 
tomer ID text box with a combo box. First, 
remove the Customer ID text box by select- 
ing the control and pressing the [Del] key. 
Then, open the field list and tool box. (You 
open the field list by clicking the Field List 
button (Œ) on the tool bar. You open the 
tool box by checking the Toolbox option on 
the View menu.) Next, select the Combo 
box tool (Œ) in the tool box, click Customer 
ID in the field list, and drag the mouse 
pointer to the former position of the deleted 
Customer ID text box. When you release 
the mouse button, a new combo box will 
appear, as shown in Figure C. 

Next, configure the new combo box by 
using the property sheet. Start by clicking 
the Properties button (Œ) 

First, make sure the property sheet is dis- 
playing the combo box’s properties. Then 
set the properties listed in Table B. Your 
property sheet should resemble the one 
shown in Figure D. 

You'll probably want to place the new 
combo box in the Customer ID field’s posi- 
tion in the tab order. Pull down the Edit 
menu and select the Tab Order... command. 
Next, click the CustomerLookUp entry’s 
row selector. Then, click again and drag 
the entry to just below the Order ID item’s 
position. After you’ve restored the original 
tab order, click OK. 


Table B 
Property 


Control Name 


CustomerLookUp 


Row Source Customers 


| Column Count 4 

Column Widths 0.5 in; 1.25 in; 
125 in; 1.25 in 
4.25 in 


List Width 


Figure D 


— ann oe ——————————— 


Enter the combo box properties as illustrated here. 


Finally, you must create the text boxes 
and corresponding labels that will display 
the data in the columns of the combo box’s 
selection list. First, use the Text Box tool to 
add three unbound text box controls to the 
right of the Orders table’s field controls. 
Then, change the text in the associated 
label controls to the three field names 
you ll display—Customer Name:, Contact 
Name:, and Contact Title:. You can change 
label text by clicking in the label until you 
get the insertion point cursor that lets you 
enter text. Arrange these controls as shown 
in Figure E. 

Next, assign the CustomerLookUp combo 
box’s Column properties to the text boxes’ 
Control Source properties. Note that the 
Customer Name, Contact Name, and Con- 
tact Title fields reside in columns 1, 2, and 
3, respectively. Assign the Column prop- 
erties as shown in Table C. (Remember to 
begin the expressions with the equal signs.) 

Now you're ready to view the form. 
First, save it with the File menu’s Save As... 
command. In the Save As dialog box, enter 
Orders Form and click OK. Then, click the 
Form View button (Œ) on the tool bar. 
Access will display the first Orders record 
in the form. As we explained, the informa- 
tion in the combo box’s selection list appears 
in the unbound text boxes. 

To select another customer for the order, 
click the Customer ID combo box’s drop- 


down arrow. The selection list will appear 
as shown in Figure F. When you select a 
customer—say, BERGS—the new customer’s 
data pops into the Customer Info panel. 


Conclusion 

In this article, we showed you how to dis- 
play in separate text boxes the data in a 
combo box’s selection list. By using this 
technique, you can keep information from 
another table visible while you work with 
the data from the form’s main table. * 


Figure E 


Arrange the label and text box controls to the right of the Orders table’s 
field controls. 


Table C 


Text Box Expression 


Customer Name 


=CustomerLookUp.Column(1) 


Contact Name 


=CustomerLookUp.Column(2) 


Contact Title 


=CustomerLookUp.Column(3) 


Figure F 


Orders 


ERGS = Berastad's Scandinaviar: Tammy Wong Order Administrator 
LUEL Blue Lake Deli & Grocer? Hanna Moore “Owner = 
LUMG . Blum's Goods : Pat Parkes Marketing Manager Es 
OBCM Bobcat Mesa Western Gi Gladys Lindsay : Marketing Manager 

? Elizabeth Lincaln 

: Victoria Ashworth 


CAESM Caesar's 


When you click the dropdown arrow, the selection list appears. 
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Be careful not to use property 
names as field names 


ccess lays down several rules you in expressions you may want to display on 
must follow in naming fields and forms or reports. When you assign the 

other objects. For instance, you expression to the text box control to dis- 
can use up to 64 characters as long as play, Access will always mistake the field 
you don’t include periods (.), exclamation for the property that has the same name. 
points (!), or brackets ([ ]). Also, you can’t 
begin a name with a space or a control The Part Inventor y table 
character. example 


However, these rules don’t tell the whole 
story: You can still get into trouble. In this 
article, we’ll show you what can occur 
when you choose a field name that also 


Now we'll show you how this problem 
can arise. Suppose you use a table named 
Part Inventory to store a list of parts and 
their dimensions and costs. Table A shows 
happens to be a property name. In a nut- the table's structure; Figure A shows some 
shell, Access will let you use the name for sample data. Notice the name of the third 
the field, but it won’t let you use the field field—WIDTH. A conflict arises when you 
use this name because form and report 


acu objects as well as the controls you place 
The Part Inventory table on forms and reports all have Width 
properties. 
Field Name Data Type To create this table, list the tables in the 


Database window. Then, click the New but- 
_ we ton. In the Table window that appears, type 
UNIT COs. Currency the field names and data types as listed in 
a N — | Table A. Next, make the PART # field the 
WIDTH o NT umber |. table’s key by first clicking the row selector 
LENGTH Mamoe and then clicking the Primary Key button 
(£) on the tool bar. Finally, use the File 
menu’s Save As... command to save the 
table with the name Part Inventory, and 
3 Close the window. 
WATE ENSTH At first glance, the field names seem to 
a: as. 12 COA work without causing any problems. As 


- | erie MenNN: you can see from the figure’s datasheet, 


PART # Counter 


Figure A 


ee: nn: sn i Access stores data in the WIDTH column 


normally. However, trouble will arise 

call ae mme when you create forms and reports and 
We'll use this sample data in our example. include the WIDTH field in an unbound 
control's expression. Access will use the 
property value rather than the contents 
of the field to compute the value of the 
expression. 


Figure B 


Form: Formi 


Creating a Part Inventory form 

To see this problem for yourself, create a 
form for the Part Inventory table. Highlight 
the table name in the Database window 
and click the New Form button (Œ) on the 
tool bar. In the New Form dialog box, click 
the FormWizard button. Then, in the dia- 


Pi SEA aS 
We'll use this form to demonstrate the problems that 108 box that follows, select Single-Column 
result from naming a field WIDTH. and click the OK button. The Single-Column 
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FormWizard’s first dialog box will appear. 
Click the Fast Forward button (la) to tell 
the wizard to generate the default form. In 
the next and final dialog box, click the Design 
button. The FormWizard will generate the 
form shown in Figure B. 

Now suppose you want to multiply the 
WIDTH and LENGTH fields and display 
the result on the form. To do so, you create 
a new text box control that displays the re- 
sults of the calculation [WIDTH]*[LENGTH]. 

First, lengthen the form’s Detail section 
to make room for the new text box. Then, 
open the tool box if it isn’t already on the 
screen. (You do so by checking the Toolbox 
option on the View menu.) Next, use the 
Text Box tool (i) to place the new control 
just below the LENGTH text box, as shown 
in Figure C. 

Now you want to assign the expression 
to the text box’s Control Source property. 
Open the property sheet by clicking the 
Properties button (Œ) on the tool bar. Make 
sure the property sheet lists the new control's 
properties. Type the expression =/WIDTH]* 
[LENGTH] into Control Source. 

Before you press [Enter] to finalize the 
Control Source setting, your entry will look 
like the one in Figure D. However, once you 
press [Enter], Access replaces the [WIDTH] 
field name with the Width property name, 
as shown in Figure E. 

When the expression multiplies the 
LENGTH field by the Width property, the 
text box’s value will be wildly incorrect. 
Access stores the Width property value in 
twips—the base unit of measure for Win- 
dows’ screen size. Figure F shows the non- 
sense result in our example. In this case, the 
text box labeled Field15 displays the result 
of multiplying the LENGTH field entry, 2, 
by the Width property value, 3560. 


Suggestions 
In summary, Access lets you use the name 
of a property as a field name. However, if 
you use the field name in an expression, 
Access will use the property value instead 
of the field value. The only way to avoid 
this problem is to be sure you don’t use 
property names for your field names. 
Unfortunately, a property name is some- 
times the most obvious choice for a field 
name. If you find yourself in this situation, 
you should probably make some small 


change to the field name to distinguish it 
from the property name. For example, you 
could end the field name with the pound 
sign (#). In this case, you could use WIDTH# 
instead of WIDTH. «* 


Figure C 


Place the new text box just below the form’s 
LENGTH text box. 


Figure D 


You can type the [WIDTH] field into the Control 


Source property’s expression... 
Figure E 


: Text Box 7 
d15 


...but Access will convert the field identifier [WIDTH] 


to the property name Width. 


Figure F 


The calculated value, labeled Field15, is meaningless 


when Access multiplies the LENGTH field entry by 
the Width property. 
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Figure B 


Removing the login security 
from the PIM application 


f you’ve examined the sample data- 
bases Microsoft ships with Access, 
you've probably discovered the 

Personal Information Manager (PIM) appli- 
cation. Many users have found this appli- 
cation very useful for making things-to-do 
lists and keeping track of appointments. 
Furthermore, if you work on a network, 
the one database file can manage all users’ 
appointments. That way, you can review 
your associates’ appointments as you 
schedule a meeting. 

When you open the PIM.MDB database 
file (located in the Access installation di- 
rectory), several windows appear and dis- 
appear as the application loads.Then, the 
dialog box shown in Figure A appears and 
asks you to enter your user name and pass- 
word. If you haven’t used the PIM applica- 
tion, you'll need to use the sample user’s 
name and password—John Doe and John, 
respectively. After you do so, the applica- 


Figure A 


PIM Database - Login 


When you launch the PIM application, you must log 
into the system by using this dialog box. 


After you log into the PIM application, this form appears. 


Inside Microsoft Access 


tion displays the main form shown in Figure 
B. You can then enter or review your appoint- 
ments and so on. 

As useful as this application is, the login 
process can be annoying if you’re the only 
user and, as a result, have no need for the 
login security. In this article, we’ll show 
you how to remove the login process so 
that the main form appears as soon as you 
launch the application. 


Modifying the PIM 
application 

The article “Disabling Individual Macro 
Statements,” in the July 1993 issue of Inside 
Microsoft Access, proposed that you remove 
the login dialog box by eliminating a macro 
action that calls a function named DoLogin(). 
However, simply skipping that function 
has unfortunate side effects. For example, 
the function determines the current date, 
without which the application can’t properly 
initialize the calendar display and appoint- 
ment book. 

As you'll see, removing the login security 
doesn’t require any major changes to the 
application. You just strip out the state- 
ments in DoLogin() that produce the PIM 
Database - Login dialog box and validate 
the user name and password. Instead of 
displaying the dialog box, your version of 
the DoLogin() function will directly insert 
your user name. 

Start by opening the PIM.MDB database 
file while holding down the [Shift] key. You 
first pull down the File menu and click the 
Open Database... option. You next high- 
light the PIM.MDB file in the selection list, 
press and hold the [Shift] key, and click OK. 


Entering your user information 

in the Person table 

Before updating the DoLogin() function, you 
must insert your name in the application’s 
Person table, which holds the list of users. 
While the Database window shows the list 
of tables, double-click the Person table. 
Then, move to the blank row at the end of 
the datasheet and enter your name in the 
Name field. Next, move to the Password 
field and type a password. (You won’t ever 


use this password: 
Remember, you're re- 
moving login security. 
However, as a rule, you 
should provide pass- 
words when asked for 
them.) 

After you type the 
password, save your new 
record by selecting the 
Save Record command 
on the File menu. The 
counter field, ID, will 
generate your user ID 
value. Write down this 
number—you'll need 
it as you modify the 
DoLogin() function— 
and then close the 
Table window. 


Updating the 
DoLogin() function 
Next, return to the Data- 
base window and click 
the Module button to 
list the database’s mo- 
dules. Then, right-double- 
click the Login module 
to open the module in 
Design view. The Module 
window will appear, 
showing the declarations 
section. Display the Do- 
Login() function by click- 
ing the Procedure combo 
box’s dropdown arrow 
and choosing the func- 
tion in the selection list. 
(You'll find this combo 
box in the tool bar.) 
You'll modify the 
function mostly by omit- 
ting statements. However, 
we suggest that rather 
than just deleting the 
statements, you convert 
them to comments. To 
do so, insert an apos- 
trophe at the beginning 
of the line. Listing A 
shows how your 
DoLogin() function 
should appear after 
you finish. Notice we 


Listing A: DoLogin() 


Function | Dolo! i n í L As ‘Int e ~ — 
Dim db As Database, t As Table 


‘Cobb 
Cobb - 
Cobb 


| Cai i 
mo 


'Cobb 
'Cobb 


‘Cobb 


‘Cobb 


End Function | 


a. m um 


b End r 


CurrentDB() _ 


— * open the s login 1 form as a modal L dialog 


‘DoError | deLOGINABORTED ao 
DoCmd SelectObject A_FORM, "Login", | True - 


r FToolbarWasUp( ) Then 
X% = = ShowTootbari) 


ie Close 


Validate the user and open the main form if valid, 


tt (FValidUser(Forms!Login!UserID, Forns! Login! assvoré) ma 


If (FIsLoadedi Login 1) Then 


Update Login iniormation 


Set t = db.OpenTable("Current") 
ede ee 
 tEdt — 
 t.Person = mp 
t.Logon = mb — 
oe = Dale 
t Update 
Telos 
dh Close 


| Docnd Close — FORM, m 
End If -o o — yy 
- DoCmd OpenForn varny", A NORMAL, "oo A EDIT, A a 


Else 
H (FIsLoaded{"Login"}) Then 
~ DoCmd Close A_FORM, "Login" 
End If _ : 
h- Porosia 
End If _ 
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Macro Tip 


inserted the word Cobb in addition to the 
apostrophe to distinguish the comments 
we re suggesting from the original 
comments. 

We've highlighted the only line you must 
actually change. Replace the statement 


ID = DLookup("ID", "Person", "[Name]=""" + 
=> Forms !Login!UserID %4 ma 


with 


ID = <ID value> 


Disabling the ability 


where <ID value> is the number that appear- 
ed in the ID field when you entered your 
name in the Person table. The number 13 
appeared when we worked through the 
example. After you’ve made these changes, 
save the module with the File menu’s Save 
command. Next, close the Module window 
and then the Database window. 

You can now use the PIM application 
without having to log in. When you open 
the application, the main form appears 
without your having to use the PIM 
Database - Login dialog box. * 


to run a macro 


from the Database window 


ou can create two types of macros in 

Microsoft Access. One type of macro 

automates tasks you perform from 
the Database window. For instance, you 
may create a macro that imports a text file 
into a table, specifying the type of file for- 
mat and the destination table. Another type 
of macro you create—a macro group—is 
actually a collection of distinct macros. 
You usually develop these macros to 
collect the macros you use on a form or 
report. 

You run the first type of macro by double- 
clicking the macro name in the Database 
window. However, you don’t use a macro 
group that way. Access calls the macros 
that reside in a macro group in response 
to events that occur on the form or report. 
In fact, running a macro group from the 
Database window is annoying. Since you 
designed the macro actions in the group 
for a very specific set of circumstances, an 
error will almost always occur. 

It’d be nice if you could avoid the errors 
in this situation. If you accidentally run a 
macro group from the Database window, 
you want to simply return to the Database 
window. In this article, we’ll show you a 
simple tip for designing macro groups that 
prevents Access from executing the macro’s 
actions when you run the macro group from 
the Database window. We'll start by review- 
ing macro groups and how you define 
several macros within a single macro object. 
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Understanding macro groups 


As we mentioned, macro groups contain 
several individual macros that each handle 
a specific event on a form or report. You 
define several macros within a macro group 
by clustering each macro’s actions and then 
using the Macro Name column to assign a 
name to each group of actions. To assign 
the macro names, you open the Macro 
Name column by clicking the Macro 
Names button ((&%) on the tool bar and then 
enter the names next to the first action of 
each macro in the cluster. 


The trick 


What actually happens when you run a 
macro group from the Database window? 
Well, Access doesn’t execute all the actions 
in the macro group. Instead, it executes 
only the actions in the group’s first macro. 
When it encounters the second macro’s 
name, it will stop. 

You can use this fact to avoid the error 
messages that appear if you inadvertently 
run a macro group from the Database win- 
dow. You simply begin the first macro on 
the second row rather than on the first. 
Access will consider the blank row as the 
macro group’s first macro even though 
the row doesn’t have a name. As a result, 
Access will stop running actions when it 
encounters your first macro’s name in the 
second row. 


An example 


As an example, suppose you assembled 
into a macro group the three macros you 
created in “Creating a Flexible Key Field by 
Using a Counter as Only One Component” 
on page 1. This macro group would define 
the macros that control how you update 
the key field when certain events occur 
during data entry. You don’t ever run 
these macros from the Database window. 
If you follow the advice we gave you in 
this article, you'll leave the first row blank 
in these macros, as shown in Figure A. That 
way, Access will stop running the macro 
when it encounters the first macro name. 


Providing online comments 
for macro groups 


This basic tip for disabling a macro’s op- 


eration from the Database window leaves 
the door open for another useful tech- 


nique: You can use the first row of a 
macro group to display a message 
box that describes the purpose of 
the macro group. 

Returning to our example, Figure 
B shows the sample macro group 
after we inserted a MsgBox action 
that displays the message This is a 
macro group for Members Form. Figure 
B also shows the message box that 
appears on the screen. 


Conclusion 


In this article, we showed you how to 
avoid the annoying error messages 
that usually occur when you run a 


A simpler not-in query 


he article “Selecting Records from One 

Table That Aren’t in Another Table,” in 
the July 1993 issue, caught my eye recently. 
The article describes a not-in query that 
returns the records from one table that 
don’t have a matching record in another 
table. I have addressed this problem on my 
own, and I believe my solution is less 
complicated and produces a faster query. 

First, I'll review your method so that we 

can compare the two techniques. As the 
article describes, you use an outer join to 


macro group from the Database window— 
you simply leave the macro grid’s first row 
blank. We also showed how you can use 
the first row to provide online comments 
for the form. « 


Figure A 


alle 


Aer e = 
: DoMenultem 


Leave the first line of the Customer Table Form macro blank to avoid errors in 
case you accidentally run the macro from the Database window. 
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This is a macro group for Members Form 


make sure the query can select all records 
from the larger table. You then group on 
the key field from the larger table and use 
the Count operation to count the records 
from the smaller table that have a key value 
matching those in the large table. The query 
will count either 1 (there is a matching key) 
or 0 (there is no matching key). You then 
select records that have a count of 0 in the 
smaller table. 

With my technique, you also use an 
outer join to link the tables. However, you 


By using a MsgBox action in the macro group’s first row, you can display a description 
of the macro group. 
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Figure A 


The July article’s method for creating a not-in query uses the Total row to select 


Product Name 
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records in Order Details that have a count of 0. 


Figure B 
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Instead of using the Total row, this method allows you to select records from 
Products that have a null entry in Order Details. 


don’t use the Count operation. Instead, you 
select records from the larger table only if 
the value of the smaller table’s key field 

is Null. A Null key field means the table 
doesn’t contain a record with a matching 
key value. 


An example 
As an example, let’s create not-in queries 
in the NWIND.MDB sample database so 
that all readers can give it a try. I'll create 
a not-in query listing products that have 
never been ordered. This is a not-in query 
because you are looking for Product ID 
entries in the Products table that don’t 
appear in the Order Details table. 

The query shown in Figure A implements 
the original technique. To create this query, 
you complete the following steps: 


1. Include the Products and Order 
Details tables in a new select query. 


2. Convert the equi-join, which auto- 
matically appears, to an outer join 
so that the query can select all rec- 
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ords from the Products table. (Do 
so by double-clicking the join line 
and, in the Join Properties dialog 
box, selecting the option that in- 
cludes all records from Products.) 


3. Add fields from the Products table 
you want to see in the query’s 
datasheet—Product ID and 
Product Name, for example. 


4. Add the Product ID field from the 
Order Details table and deselect 
the column’s Show box. 


5. Click the Totals button ([2J) in the 
tool bar to open the Total row. In 
the Order Details table’s Product 
ID column, replace the default 
value Group By with Count. 


6. Enter 0 in the Criteria cell of the 
Order Details table’s Product 
ID field. 


Figure B shows my version of this 
query. To create it, you complete the first 
four steps I list above. But then, instead of 
opening the Total row, just enter Is Null in 
the Criteria cell of the Order Details table’s 
Product ID field. 

When you run this query, Access will 
return an empty datasheet. Nothing is 
wrong with the query: The Order Details 
table simply stores an order for every 
product. If you want the query to select 
records, you'll need to add extra products 
into the Products table. 


Notes 
As you can see, using the Is Null condition 
in the Criteria cell is much simpler and 
makes a faster query. Furthermore, the re- 
sulting record set is updatable. You can up- 
date product information directly from the 
query’s datasheet. 
Oleg Ostrozhansky 
Evergreen Park, Illinois 


We thank Mr. Ostrozhansky for his much 
improved not-in query. If you’ve used our 
version of the not-in query, you may have 
been frustrated by it. One problem is that 
you can’t base other queries on queries that 
are not updatable. Now that you can create 
an updatable not-in query, you can incor- 
porate the not-in query in more sophisti- 
cated queries. 


Creating customer copies and file copies 
of the same invoice 


would like to know if there is an easy 

way to print duplicate copies of a re- 
port while changing a single label for each 
copy. Specifically, I want to create a cus- 
tomer copy and file copy of each invoice I 
print. Other than creating two reports and 
printing one after the other, I can’t think of 
a straightforward way to do it. 


Chicago, Illinois 


Fortunately, there’s an easy way to create 
customer and file copies of a single in- 
voice. You base your invoice report on a 
cross-product query, which is a special type 
of query that generates a separate record 
for each combination of two tables’ rec- 
ords. Your query will cross the Orders 
table with a one-field table that stores 

the labels you want to print for each du- 
plicate. The resulting query will create a 
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This comprehensive annual index is arranged by subject, listing the 


duplicate Orders record for each label. You 
can then base your invoice report on this 
query and include a text box to print the 
Whose Copy field. The report will print 
both customer and file copies for each in- 
voice because the query supplies a record 
for each copy. 

You create a cross-product query by 
including the two tables in the query— 
without joining them. Figure A shows the 
query Mr. Ritchie 
needs. This query 
selects several fields 
from the Orders 
table and then the 
single field from the 
Copies table. The 
query will repeat 
each Orders record 
for each record in 
the Copies table. 


Jay Ritchie 


Figure A 


This query creates separate records for the customer 
and file copies of your invoices. 
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solving resource and to help you locate articles of interest in issues 


variety of tips and techniques covered in Inside Microsoft Access 
during 1993. The Cobb Group provides this index to make the 
collection of issues you received in 1993 more useful as a problem- 
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